Source Record 
Layout Definitions 




11 




Neutral Layout 
Definitions 



01 STUDENT-SUMMARY-INFORMATION . 



05 


ID-NUMBER 


PIC 


9(61 . 


05 


PIK 


PIC 


9(6) . 


05 


NAME 


PIC 


A(35) . 


05 


ADDRESS 


PIC 


A(25) 




OCCURS 3 TIMES. 






05 


PHONE-NUMBER 


PIC 


999-999-9999 


05 


SOCIAL-SECURITY-NUMBER 


PIC 


999-99-9999. 


05 


GRADE- POINT-AVERAGE 


PIC 


9V99, 


05 


BALANCES . 








10 TUITION 


PIC 


S9(5) COMP-3 




10 HOUSING 


PIC 


59(5) COMP-3 



Fig. 3 



<?xmi V€r£ion="l . 0"?> 

<!DOCTYPE record SYSTEM "/XML/Meta/tmeta . dtd"> 

<record name="STUDENT-SUMMARY-INFORMATION" architecture-"s390" align="l"> 
<field type="pic" align="l" spec=" 999999" siEe="6"> 

<name>ID-NLrMBER</name> 

<association>ID-NUMBER</association> 
</field> 

<field type=="pic" align="l" spec=" 999999" si2e="6"> 

<name>PIN</name> 

<association>PIN</association> 
</field> 

<field type=*'pic" align="l" spec="XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX" Eize="35"> 
<name>NAME</ name> 
<association>NAME</associataon> 



<array size-"3"> 

<name>ADDRESS</name> 

<associ ation>ADDRESS</association> 

<field type="pic" align="l" spec="XXXXXXXXXXXXXXXXXXXXXXXXX" si2e-"25"> 

<name>ADDRESS</nanie> 

<association>ADDRESS</association> 
</field> 
</array> 

<field type="pic" align="l" spec=" 999X999X9999" si2e="I2"> 

<name>PHONE-NUMBER</name> 

<association>PHONE-NUMBER</association> 
</field> 

<field type="pic" align="l" spec=" 999X99X9999" Eize="ll"> 

<name>SOCIAL-SECURITY-NUMBER</name> 

<association>SOCIAL-SECURITY-NUMBER</association> 
</field> 

<field type="pic" align="l" spec="999" shift="-2" size-"3"> 

<name>GRADE-POINT-AVERAGE</naiue> 

<association>GRADE-POINT-AVERAGE</association> 
</field> 
'«cstruct> 

<name>BALANCES</ name> 

<association>BAL7\NCES</association> 

<field type="packed" align="l" si2e="3"> 
<name>TUITION</name> 
<association>Ti;iTION</as£ociation> 

</field> 

<field type="packed" align="l" Ei2e="3"> 
<name>HOUSING</ name> 



</field> 



<association>HOLrsiNG</association> 
</field> 
</str\JCt> 
</ record> 




package com, touchnet .beangen; 



import com. touchnet .base .* ; 
import java.io,*; 
import 3ava.util.*; 

/* + 

* This will provide the functionality that is common to all generated JavaBeans 

* map into legacy structures 
* 

* Creation date: (12/14/99 1:28:08 PM) 

* ^author: Gary Murphy 
V 

public abstract class AbstractStructure 
implements Structurelnterf ace 

{ 

private String architectures- 
private StructTreeNode root = null; 

private BinaryRenderingEngme engine = new BinaryRenderingEngine ( ) ; 
private 3 ava . lang . String metadataName; 

y * 

* Create the base constructure for Java objects that wrapper legacy data 

* structures 
V 

public AbstractStructure ( ) 
{ 

super ( ) ; 
} 

/** 

* Access the name of the architecture that the underlying binary data 

* represents 
*/ 

public String getArchitecture ( ] 
throws TException 

{ 

return architecture; 
} 

/ + * 

* This will access an array within the structure. It will be returned as 

* an array of some concrete instance of this AbstractStructure. Even if 

* the array is of a single field, it will still be represented as a 

* structure that simply contains a single element. If the requested 

* element is not an array, this will throw an exception 
*/ 

public Structurelnterf ace n getArray { String name) 
throws TException 

AbstractStructureTreeNode node = getNode (name ) ; 
if (node instanceof ArrayTreeNode ) 
{ 

ArrayTreeNode arrayNode ^ (ArrayTreeNode ) node; 

return arrayNode . getArray {) ; 

} 

// If this isn't an array node, then we tried to access a non-array 
// as an array 

throw new TException ( "Attempt to access a non-array element as an array"); 

} 

/** 

* Access the binary rendering engine. 



* Creation date: (1/3/00 1:11:03 PM) 

* ^return com. touchnet .base . BinaryRenderingEngine 

V 

protected BinaryRenderingEngine getEngine() 
{ 

if (null == engine) 

engine = new BinaryRenderingEngine () ; 
return engine; 

} 
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* Access the named field within the component 
*/ 

public String getField ( String name) 
throws TException 

{ 

AbstractStructureTreeNode node ~ getNode { name ) ; 
if (node instanceof FieldTreeNode ) 
{ 

FieldTreeNode fieldNode = { FieldTreeNode ) node; 
return fieldNode . getField ( ) .toString ( ) ; 

} 

// It^s not a field, so this is an exception 

throw new TException { "Attempt to access a non-field element as a field"); 
) 

* Access the name of the metadata that describes this component 

* Creation date: (2/29/00 11:24:58 AM) 

* @return j ava . lang . String 
*/ 

public String getMetadataName ( ) 
{ 

return metadataName; 
} 

* This will access the named node, starting at the root of the embedded tree 
•k 

* Creation date: (2/29/00 11:43:09 AM) 

* @return com. touchnet .beangen. AbstractStructureTreeNode 

* @param name 3 ava . lang . String 

* (aexception com. touchnet .base .TException The exception description. 
*/ 

protected AbstractStructureTreeNode getNode ( String name) 
throws TException 

StringTo)cenizer tokenizer = new StringTokenizer ( name, "/"}; 

return getNode ( tokeni zer , getRoot ( ) ) ; 

} 

/** 

* This will access the named node, as a child of the current node. The name 

* IS the next element in the tokenizer. If the name child doesn't exist, thi 

* will throw an exception 
+ 

* Creation date: (2/29/00 11:43:09 AM) 

* @return com. touchnet .beangen. AbstractStructureTreeNode 

* gparam name 3 ava . lang . String 

* ^exception com. touchnet . base . TException The exception description. 
V 

protected AbstractStructureTreeNode 

getNode (StringTokenizer tokenizer, AbstractStructureTreeNode current) 
throws TException 

{ 

if ( ! tokenizer . hasMoreElements ( ) ) 

return current; // The current node is the requested noae 

String child = tokeni zer . nextToken { ) ; 

// Look for the name among the child nodes 

mt count = current .getChildCount 0 ; 
for (int i = 0; i < count; ++i) 
{ 

AbstractStructureTreeNode node = 

(AbstractStructureTreeNode) current .getChildAt (i ) ; 

if (node .getName { ) . equals (child) ) 

return getNode { tokenizer , node); 

} 




// The name didn't match any of the children 

throw new TException { "The child of ' "^current . getName { ) 4 " ' named 

child-t-"' does not exist"]; 

} 

* This will access the root node for the legacy data layout 
* 

* Creation date: (1/3/00 12:56:48 PM) 

* ^return com. touchnet .beangen . StructTreeNode 

*/ 

protected StructTreeNode getRoot ( ) 
{ 

return root; 

} 

* This will read the binary contents of the input stream anc 

* place it in the appropriate nodes of the tree 
*/ 

public void read ( InputStream stream) 
throws TException 

{ 

// Code not shown 
} 

/** 

* Access the name of the architecture that describes the underlying 

* binary data. 
V 

public void setArchitecture {String name) 
throws TException 
{ 

architecture = name; 
return; 

} 

/** 

* Set the array for this level in the data structure 

public void £etArray(String name, Structurelnterf ace [ ] child) 
throws TException 
{ 

AbstractStructureTreeNode node = getNode ( name ) ; 
if (node instanceof ArrayTreeNode } 

{ 

ArrayTreeNode arrayNode = (ArrayTreeNode) noae; 

arrayNode . setArray (child) ; 

} 

// If this isn't an array node, then we tried to access a non-array 
// as an array 

throw new TException ( "Attempt to access a non-array element as an array") 

} 

/** 

* Update the named field with the value 
*/ 

public void setField (String name. String value) 
throws TException 

{ 

AbstractStructureTreeNode node = getNode (name ) ; 
if (node instanceof FieldTreeNode ) 

{ 

FieldTreeNode fieldNode = ( FieldTreeNode ) noae ; 
LegacyField field = f leldNode . get Fi eld ( ) ; 
field. setValue (value) ; 
} 

// It's not a field, so this is an exception 
throw new TException ( "Attempt to access a non-field element as a field") 
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Access the name of the metadata that describes this component 

* Creation date: (2/29/00 11:24:58 AM) 

* feparam name j ava . lang . String 
*/ 

public void setMetadataName (String name) 
{ 

metadataName = name; 
return; 

} 

/** 

* This will access the root node for the legacy data layout 
* 

* Creation date: (1/3/00 12:56:48 PM) 

* gparam rootNode com. touchnet . beangen . StructTreeNode 
*/ 

protected void setRoot ( StructTreeNode rootNode 1 

{ 

root == rootNode; 
return; 

.y } 

U /** 

,Z * This will write the binary contents back to the 

% 

^ public void write ( OutputStream stream) 

fl throws TException 

{ 

// Code not shown 



} 
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package com. touchnet . beangen . generated; 



import com. touchnet .beangen .* ; 
import com. touchnet .base.*; 
/** 

* This was automatically generated 2/29/00 12:38:47 PM 
*/ 

public class StudentSummarylnf ormation 
extends AbstractStructur g 

{ 

/** 

* StudentSummarylnf ormation constructor comment. 
V 

public StudentSummarylnf ormation ( ) { 
super(); 

} 

public String getAddress ( int index) 
throws TException 

Structurelnterface[] array = getArray t "/ADDRESS" ) ; 

return array[index] . getField ( "/" ) ; 

} 

public String getGradePointAverage ( ) 
{"1; throws TException 

return getField { "/GRADE -POINT-AVERAGE" ) ; 

''J } 

I'll public String getHousing(] 

throws TException 

:f { 

in return getField { "/BALANCES/HOUSING" ) ; 

m ^ 

■^L: public string getldNumber ( ] 

•'ivs throws TException 

{ 

return getField ( "/ID-NUMBER" ) ; 

III public String getName ( } 

r-^ throws TException 

return get Field { "/NAME" } ; 

i;:3 ^ 

public String get PhoneNumber ( ) 
i"*^ throws TException 

{ 

return getField ("/ PHONE-NUMBER" ) ; 

} 

public String getPIN() 
throws TException 
{ 

return getField ( "/PIN" ) ; 

} 

public String getSoci alSecurityNumber ( ) 
throws TException 

( 

return get Fi eld ( " / SOCI AL-SECURITY-NUMBER" } ; 
} 

public String getTuition() 
throws TException 

{ 

return getField ( "/BALANCES/TUITION" ) ; 

} 

public void setAddressUnt nth, String value) 
throws TException 

Structurelnterface[] array = getArray ( "/ADDRESS" ) ; 

array [nth] . setField ( "/" , value) ; 

} 

public void setGradePointAverage ( String value) 

throws TException 
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set Field {"/GRADE- POINT -AVE RAGE", value) ; 
1 

public void setHousing (String value) 
throws TException 

{ 

setField ("/BALANCES/HOUSING", value ) ; 

} 

public void setldNumber (String value) 
throws TException 

{ 

setField ("/ID-NUMBER", value} ; 

} 

public void setName (String value) 
throws TException 
{ 

setField ("/NAME", value) ; 
} 

public void setPhoneNumber (String value) 
throws TException 

{ 

set Field ("/PHONE -NUMBER", value) ; 
} 

public void setPIN { String value) 
throws TException 
{ 

setField{"/PIN", value); 

} 

public void setSocialSecurityNumber (String va 
throws TException 
{ 

setField { "/SOCIAL-SECURITY-NUMBER" , value ) 

} 

public void setTuition(String value] 
throws TException 
{ 

setField ("/BALANCES/TUITION", value) ; 

} 
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y* Published APIs and data types */ 



typeaef long IxsHandle; 

IxsHandle ixsOpen{char *ic, char *ho£tf 
unsignea short port]; 
in^ IxsClose (IxsHandle handle); 

IxsRead (IxsHandle handle, char *name, void *asta, unsigned long length); 
m' IxsWritedxsHandle handle, cnar *name, void *aata, unsigned long length), 

in- IxsCommit (IxsHandle handle); 

m: IxsRollback { IxsHandle handle); 

vcic IxsGetLastNameRead (IxsHandle handle, char *name). 
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pacKaae com. touchnet .util .base; 



Z/-' Copyright (c) 200C 

ir TouchNet Information Systems, Inc. 

in All Rights Keservec 

//^ 

//* This program is an unpublishec copyright work of TouchNet InfcrmatioTi 

//* Systems, Inc. of Lenexa, . The program, all information disclosec 

If* anc the matter shown anc cescribec hereon or herewith are confiaential 

//* ana propr:et3ry to louchNet Information Systems, Inc. 
//' 

I yf+**<;_^Qpy^2Qh't,|>**"***"*'*'***'*"********'*"*** ******** ********************* + 

//* Change Log. 

//* $Log: EmaryRenaeringEngine . 3 ava i. 

//* Revision 1.4 2000/07/19 10:36:38 gin 

import com. touchnet . uti 1 -base ; 
import com. touchnet . util . * ; 
import 3 ava . math . Big Integer ; 
/** 

* This IS a utility object that will manage the bit/byte manipulation 

* lor a variety of data conversions. 
*/ 

public class BinaryRenderingEnginf 
{ 

/*•* 

* Construct an object that will renaer byte arrays in a variety 

* of formats 



public El naryRenderingEngme ( ; 
super { 1 ; 

* Access the value that is usee when there is a renaerinc erroi 
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* ^return bytf 

public byte getErrorByte { ; 
return errorByte; 

/*-* 

* Return a copy of one of thest . 
* 

* fereturn COM. touchnet . xmlhost . BinaryRenoeringEngi nf 

public static El naryRenaeringEngme get 2 nstance ( ; 

if (instance == null' 

instance = new BmaryRenaeri ngEngme ( ) ; 
return instance; 



* This 15 called when there is a formatting exception such as £ 

* string representation of a number that overflows the number of 

* bytes that number can handle 

* (spsram oata byte[l 

* feparsm exception 3 ava . 1 ang . NumberFormatExceptior. 
*/ 

public void handl eFormatException (byte [ ] oata, II 1 egalArcumentException exception) 

// For now, we just set the bytes to some pre-definea value. We may want 
// to make this a Java&ean that fires an formatting exception event tc 
// the listeners. 



byte err = getErrorByt e ( ] ; 
lor (mt I = 0; : < data. length; ++i ; 

data[ii = err; 
return; 

* This will parse the string into a ionc 

* Creation aate: {7/12/00 11:21:57 AM 

* ^return ionc 

* feparam number 3 ava . 1 ana . Strinc 
*/ 

private long parseLong ( String number 

if ( 0 == number . 1 ength ( ) 
return C; 

// The Java parseLong () is pretty stupic. It can't handle a leading '4', so 1 neec 
// an explicit check lor that. 

If {'4' number .char At (0) ^ 

number == number . substri ng ( 1 } ; 

return Long .parseLong {number ) ; 

/*•* 

* Kenaer a Java String from a series of bytes with 7-bit ASCII values 

p * ^return 3 ava . lang . String 

F * feparam aatum byte[". 

^ *^ 

?ii public String renderAsci iSt ring ( byte [ ] datum; 

pi mt size = datum. 1 ength; 

char[] array = new char[size]; 

lor (int 1 = 0; 1 < size; ++1 1 
=«:; array[ij - ( char ) rencerPrmtableAscii (datumfi ] , ' '); 

n return String . valueOf ( array ) ; 

* This will return a byte array containing 7-bit ASCII values generatec 
■*■ from the number passec 

* ^return byte [ ; 

* feparam value mt 

* &param size mt 

* (?param pad chai 
*/ 

public byte t I renaerAsci 1 String { mt value, mt size, char pac ' 

bytei buffer = new bytelsizej; 
mt offset = C; 

boolean negative = false; 



■4 



if (lvalue < 0) && (pad ' 

value = 0 - value, 

negative = true; 

buf f er [of fset++] = (byte)'-'; 

] 

String string = Integer . toString (value ) ; 

mt length = string . 1 ength (} ; 

lor (; offset < size - length; ++offset; 

buf f er [ of f set ] = (bytejpac; // Pad on left if neeaec 
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byte[] stringBytes = string .getBytes ( 1 ; 
lor (mt 1 = 0; offset < size; ++offset, ++1; 
buf f er f of f set ] = stringBytes [ i ] ; 



return buf 1 ex ; 

* Thi5 will rencer the twc bytes m the array intc ar 
•* mteaer anc return the stranc renaerinc of tha^ 

* ^return i ava . I anc . St rinc 

* feparam raw byte[ 
*/ 

public Stranc renaerBi oEndianl 6Bit (byte [ ] rav 

short byteO = ( short ) raw [ Oj ; // Allow this tc sian-extenc 
short bytel = ( short )( raw [ 1 ] & OxOOFFl ; 

short value - 

(short) { (byteO << e 
byt e : 

) ; 

return String . val ueOf (val ue } ; 



* This will renaer the string numeric into two byte; 

* (cparam 3 ava . 1 ana . St ri nc 

* ^return raw byte[ 
*/ 

public byte[] rencerEigEndianl6Bit (String oatum, 
{ 

byte[] raw = new byte[2]; 

short value - C; 

try 

1 

value ~ parseShort (datum) ; 

raw[01 = (byte ){ (value {. OxOOOOFFOO) >> 8), 
raw[ll = (byte) { value & OxOOOOOOFF; , 

1 

catch (Number Format Except ion exception 

{ 

handl eFormatExcepti on ( raw, exception; , 

} 

return raw; 



Fig. 13C 



■* This will take a series of bytes which are expectec tc bf 
* ASCII characters representing numbers, for example: 

{ '6', '9', '6', 'C ' 



■* would be -696C. It will return an int 

* fereturn in" 

* feparam raw bytej] 
*/ 

public mt renaerl nt egerFromAsciiBytes (byte [ 1 raw 

{ 

String number = renaerAsciiZString { raw] . trim( ) , 

if ("". equals ( number ) ) // All white space is consiaered a valic zero mtegei 
return 0; 

ant value = 0; 
try 

{ 



value = parselnt ( number ; ; 
t 

catch (Number Format Except I on exception; 

handleFormatLxception { raw, new NumberFcrmatException ( } 1 ; 
return -1; 

} 

return value; 



* This will renaer bytes representing a packed aecimal field intc 

* a Etrma represent at i or. . This is a helper routine that work; 
■* tor both signec ana unsignec packed valuer 

* ^return 3ava . lang. String 

* feparam raw byte[j 

* feparam isSigned boolean 
*/ 

private Strina renderPacked (byte [ ] raw, boolean isSianed, mt offset] 
{ 

chai signCharacter =^ ' ' ; // Assume no sign 

StringBuffer buffer = new StrmgBuf f er ( } ; 

boolean minuf = false; 

// Take a peek at the offset compared to the length of the raw data and set 
// where the decimal point goei . 



int appenc = C; 

int insertAfter = -1; 

int digit? = (raw. length « 1) - I; 



if (offset > 0) // Append only 
append = offset; 

else 

{ 

// We have a negative offset, the aecimal will either be to the left oj 
// somewhere in the middle.. 

insertAfter = cagits -f offset; // Add because offset is negativf 
If (insertAfter < O; // The offset means only leading zeros... 
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buffer. append ('.'); 

for (int 1 = insertAfter; i < 0; +4i ; 
buffer . append ( ' 0' } ; 

} 

} // else 

mt rinaex ^ -l; // Inaex into the raw aatc 

int nibblf = 0; 

boolean secondNibble = true, 

for (int 1 = 0; 3 < diaits; +4i ; 

{ 

if (secondNibble; // Bump input byte every other nibble 

++rlndex; 
secondNibble = ! secondNibbl e ; 

// Wait for the mteration m which we have to stuff the extra aecimal 
/ / point . 



If (1 == insertAfter) 

buff er. append {*.'); 
if (secondNibble; 

nibble = rawfrlndex] i OxOOOOOOOF; 



nibble = (rawfrlncex] » 4) & OxOOOOOOOF; 



swa tch (nibbl e ; 



case 


C: 


buf f er 


append { ' 0 ' ) 


• break; 


case 


1 : 


but f er 


. append ( ' I ' ) 


• breax; 


case 


2 : 


buf f er 


. append ( ' 2 ' } 


• breaK; 


case 




buf f er 


append ( ' 3 ' ) 


; breaK; 


case 


4 : 


buffer 


append ( * 4 ' ) 


• breaK; 


case 


t, . 


buffer 


append ( ' 5 ' ) 


• break; 


case 


fc: 


buf f ex 


append ( ' 6 ' } 


break; 


case 


1 : 


buffer 


append ( ' 7 ' } 


brea K ; 


case 


8: 


buffer 


append ( ' 8 ' ) 


break; 


case 


9 : 


buf f er 


append ( ' 9 ' ] , 


break , 



default : 

handl e Format Except ion (ravv, 

new I 1 i eca 1 AraumentExcept i on { " Inval id value m data")); 
return "[data format error]"; 
} // switci-. 
} // tox 

// Now handle the last nibble which is the sian. 

nibble = raw[rlndex] & OxOOOOOOOF; 
switch {nibble 1 
{ 

case OxOA: 
case OxOC: 
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case OxOE: 

minus = true; 
break; 
default : 
{ 

handle Format Except ion (raw, 

new lliecalArgumentException ( "Invalid value m data")); 
return "[data format error]"; 

} 



// Appenc any aaditional trailing zeros that are a result of the aecimal shift 
// m the type aescripto: 

lor (int 1 = 0; 2 < appenc; ++i ; 
buffer . append ( ' 0 ' ) ; 

String rencerec = buf f er . toStri ng ( ) , 
if {isSigned 4& minus, 

renderea -i- rencerec; 

return rencerec; 

\ 

* This IS a helper method that will renaer PIC templates that have been pre-aet erminec 

* to be numeric. It will handle both EBCDIC or ASCII input numerics. 

* ^return byte[j 

* feparam raw :! ava . 1 ang . String 

* eparam template byte [ ; 

* feparam offset mt 

* feparam isAscii boolean 
*/ 

private byte [ ] renaerPacked ( String raw, mt size, int offset, boolean isSicned; 

{ 

byte[; buffer = new byte [size], 

shifT = 0; // This is the aecimal place shift that we find in the 
// aata. It is used to reconcile the offset parrr 
boolean decimal = false; // ... until we hit a decimal point, then it is true 



case OxOE: 
case OxOF: 
break; 
case OxOD: 



boolear. mmuf = fslse; 

byte[] useraatc = raw. getBytes ( ) ; 

byte[] numeric = new byt e 1 userciat a . i encth] ; // Just the numeric part of the aat^ 
mt numSize = 0; // Count of lust the numerics in the user datt 

fordnt 1 = 0; i < useraata . 1 ength; -f + i; 

switch {useraata [i] ; 



case 


(byte) '0 


case 


(byte) U 


case 


(byte) '2 


case 


(byte) '5 


case 


(byte) ' 4 


case 


(byte) '£ 


case 


(byte) '6 


case 


(byte) '7 


case 


(byte) '8 


case 


(byte) ' 9 



numeric [numSi ze+4 ] = 
if (decimal) ++shift; 
break; 



{ userdata [ i ] ) , 



// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
/ / 
// 
// 
// 



case (byte) ' - ' : 

minus = true; 

break; 
case (byte) '+ ' : 

break; 
case (byte ) ' . ' : 

decimal = true; 

break; 
} // switch 
} // for 

Now we have the digits separated from the sign and aecimal point. Now 
we have to normalize the aecimal offset and the digit count with tht 
template. What makes this additionally complex is the observation that 
there can be truncation on either side of the user data if the shift 
overflows the template, Consiaer the following examples: 

Assume : 



template = 


99999 


with shift -2 


Userdata 


Answe 




123C 


2300C 


(truncation 


123 


1230C 




12.? 


0123C 




1.23 


00123 




.12? 


00012 


(truncation 



At this point m the coce, we have the user data filterea out 
into 5 the string "123^'. We need to align the aecimal point 
logically based on the shifts m the template minus the logicaj 
shifts from the explicit cecimai point in the oata . 



am inaex = numSize - ((size << 1) 

int [ ] value = new int[2]; 

for (int 1 = 0; 1 < size-l; ++i; 

I 

for (int ■] = 0; J < 2; ++:) ; 



if (index < 0) 
value[j] = 0; 

else 

if (index < numSize) 

value [j] = numeric [index] & OxOOOOOOOF; 

else 

value[j] = 0; 
++ index; 



1) - offset - shift; 



Fig. 13F 



buffer[i] = (byte )( (value [ 0] << 4) | value[l];; 



// Do the last byte as a speciai case since it contains the sign nibble 
lor (int 1 ~ 0; 1 < 2; 



It (index < 0, 

value [3] = G; 

else 

if (inoex < numSize; 

value 3 = numeri c ( 1 ndex] & OxOOOOOOOF; 

el sf 

value [3 ] = 0; 
+4 inaex; 

1 

int sign = OxOC; // Piu5 
if {isSigned minus) 
sign = OxOD; 

buffer [size-1] = (byte )( (value [ 0] << 4) i signl; 
return buffer; 

} 




i ! 




